# Title:En una lista de 10 numeros, encontrar el mayor				Filename: Problema39Libro.s
# Autho: Vivanco García Joel							Date: 26/Abril / 2017
# Description: Numero máximo de una lista
# Input: -
# Output: Numero mas grande
@Problema39Libro.s
@ Encontrar el numero mayor



#DATA SEGMENT
     ARR DB 1,3,8,6,4,2,10,5,7,9
     LEN DW $-ARR 
     LARGE DB ? 
#DATA ENDS
#CODE SEGMENT 
        ASSUME DS:DATA CS:CODE 
	
        MOV AX,DATA 
        MOV DS,AX
            
        LEA SI,ARR 
        
        MOV AL,ARR[SI] 
        MOV LARGE,AL 
	
        MOV CX,LEN 
#REPEAT:
        MOV AL,ARR[SI] 
        CMP LARGE,AL 
        JG NOCHANGE
       
        MOV LARGE,AL 
#NOCHANGE:
        INC SI  
        LOOP REPEAT 
     
        MOV AH,4CH
        INT 21H   
	
#CODE ENDS
#END START
